DATA time;
DO t=0 to 9;  
OUTPUT; END;
RUN; 
PROC PRINT data=time;
RUN;

DATA int;
SET time;
p0=1000;
r=0.05;
pt=p0*(1+r)**t;
RUN; 
PROC PRINT data=int;
RUN;